home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / languages / turbo_part1.lha / modula / m2lib / Coroutines.def next >
Encoding:
Text File  |  1994-12-24  |  434 b   |  20 lines
  1. (* At present stack checking '-s' does not condsider coroutines     *)
  2. (* Therefore if you use this module make sure stack checking is off *)
  3.  
  4. DEFINITION FOR C MODULE Coroutines ;
  5.  
  6. FROM SYSTEM IMPORT ADDRESS ;
  7.  
  8. TYPE
  9.   PROCESS = ADDRESS ;
  10.  
  11. PROCEDURE TRANSFER( VAR source , destination : PROCESS ) ;
  12.  
  13. PROCEDURE NEWPROCESS( start : PROC ;
  14.               stack : ADDRESS ;
  15.               size  : LONGINT ;
  16.           VAR new   : PROCESS ) ;
  17.  
  18. END Coroutines.
  19.  
  20.